home *** CD-ROM | disk | FTP | other *** search
/ Revista do CD-ROM 102 / CD-ROM 102.iso / aplic / 2sync / 2SyncSetup.exe / graphics / scripts / DefineButton2_11 / BUTTONCONDACTION on(release).as next >
Encoding:
Text File  |  2002-03-20  |  533 b   |  22 lines
  1. on(release){
  2.    set("_level40/sound/lib:sound","120");
  3.    call("_level40/sound/lib:play");
  4.    tellTarget("_level50")
  5.    {
  6.       gotoAndStop("off");
  7.    }
  8.    if(eval("_level0:" add eval("_level0:focus") add "_module") eq "mt")
  9.    {
  10.       path = "_level15/" add _name.substr("1","2") add "/mt/codelib";
  11.       if(eval(path add ":currentview") eq "task")
  12.       {
  13.          set(path add ":task_id","new");
  14.       }
  15.       else
  16.       {
  17.          set(path add ":event_id","new");
  18.       }
  19.       call(path add ":add");
  20.    }
  21. }
  22.